From 2dc51e1e44b4c31fd474a3ccd45b5a5fd920e6f1 Mon Sep 17 00:00:00 2001 From: John Paul Wallington Date: Sun, 11 Apr 2004 04:57:02 +0000 Subject: [PATCH] * replace.el (occur-engine): Distinguish between one and several matches in the matches per buffer heading. --- lisp/replace.el | 5 +++-- 1 file changed, 3 insertions(+), 2 deletions(-) diff --git a/lisp/replace.el b/lisp/replace.el index d8d642261e4..2d26cb5cc66 100644 --- a/lisp/replace.el +++ b/lisp/replace.el @@ -916,8 +916,9 @@ See also `multi-occur'." (goto-char headerpt) (let ((beg (point)) end) - (insert (format "%d matches for \"%s\" in buffer: %s\n" - matches regexp (buffer-name buf))) + (insert (format "%d match%s for \"%s\" in buffer: %s\n" + matches (if (= matches 1) "" "es") + regexp (buffer-name buf))) (setq end (point)) (add-text-properties beg end (append -- 2.30.2